attractor

Made with R, dplyr, & ggplot2

Repo https://github.com/andrie/attractor

# install.packages("devtools")
# devtools::install_github("andrie/attractor")

library(ggplot2)
library(magrittr)
library(attractor)

a <- seed_sprott_7e(000429)
#> setting seed

dat <- 
  a %>% 
  attractor_sprott_7e(1e9, dims = c(600, 600))
# str(dat)



plot <- dat %>% 
  recolour(
    "Oranges", zero_colour = "#000000"
  )

plot %>% plot

png("test.png",width=12,height=12,units="in",res=600)

Compiled: 2019-06-20